home *** CD-ROM | disk | FTP | other *** search
- on mouseDown
-
- global topicLetter, subtopicNumber,lineSelect,mediaField, Master, PSMtextVis
-
- put line lineSelect of field mediaField into SSTmediaList
- put (item 2 of SSTmediaList) into mediaName
-
- set master = "MI1"
-
- global PSMdispVisible
-
- if not PSMdispVisible then
- openPSMdisp
- end if
-
- if PSMtextVis then
- closePSMtext
- end if
-
- if the number of cast mediaName > 0 then
- put field mediaName into field "TextDispBoard"
- else
- put field "no text" into field "textDispBoard"
- end if
-
- hidePSMcontrols
-
- repeat with n in [22, 23, 24, 40]
- set the visible of sprite n to TRUE
- end repeat
-
- updateStage
-
- global gMute, gFade
-
- if gMute = 0 then
- repeat while the volume of sound 2 < (255 - 4)
- set the volume of sound 2 to (the volume of sound 2 + 4)
- updateStage
- put the timer into time
- repeat while the timer <= time
- nothing
- end repeat
- end repeat
- set the volume of sound 2 to 255
- updateStage
- set gFade = 0
- end if
-
- end
-
-
-
- on mouseenter
- ShowTextRoll "TextRoll-Text"
- end
-
- on mouseleave
- HideTextRoll
- end
-